object frmFiltroContactos: TfrmFiltroContactos Left = 215 Top = 122 BorderStyle = bsNone Caption = 'frmFiltroContactos' ClientHeight = 524 ClientWidth = 692 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate OnKeyPress = FormKeyPress PixelsPerInch = 96 TextHeight = 13 object Shape1: TShape Left = 0 Top = 0 Width = 692 Height = 524 Align = alClient end object Label2: TLabel Left = 8 Top = 8 Width = 230 Height = 22 Caption = 'Impress�es de Forn / Func' Font.Charset = ANSI_CHARSET Font.Color = clNavy Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False Transparent = True end object Label5: TLabel Left = 10 Top = 65 Width = 31 Height = 13 Caption = 'Nome:' Transparent = True end object Label6: TLabel Left = 10 Top = 85 Width = 57 Height = 13 Caption = 'C�d. Postal:' Transparent = True end object Label8: TLabel Left = 10 Top = 45 Width = 36 Height = 13 Caption = 'C�digo:' Transparent = True end object Label15: TLabel Left = 220 Top = 47 Width = 15 Height = 13 Caption = 'at�' Transparent = True end object Label17: TLabel Left = 329 Top = 68 Width = 15 Height = 13 Caption = 'at�' Transparent = True end object Label22: TLabel Left = 10 Top = 150 Width = 53 Height = 13 Caption = 'Ordena��o' Transparent = True end object Label23: TLabel Left = 156 Top = 494 Width = 131 Height = 13 Caption = 'Imprimir na forma de ...' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object RxSpeedButton2: TRxSpeedButton Left = 560 Top = 488 Width = 110 Height = 25 Hint = 'Correspond�ncia' DropDownMenu = RxPopupMenu2 Caption = 'Correspond�ncia' end object RxLabel2: TRxLabel Left = 662 Top = 134 Width = 10 Height = 17 Alignment = taRightJustify Caption = '0' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Arial' Font.Style = [] ParentFont = False Transparent = True end object Shape2: TShape Left = 613 Top = 19 Width = 75 Height = 25 Brush.Color = clGray Pen.Color = clGray end object Label20: TLabel Left = 10 Top = 105 Width = 74 Height = 13 Caption = 'Saldo CC entre:' Transparent = True end object Label21: TLabel Left = 220 Top = 108 Width = 15 Height = 13 Caption = 'at�' Transparent = True end object DBGrid1: TDBGrid Left = 5 Top = 176 Width = 673 Height = 305 Color = clInfoBk Ctl3D = False DataSource = DataSource1 FixedColor = 13551795 Options = [dgTitles, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit] ParentCtl3D = False ReadOnly = True TabOrder = 10 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] Columns = < item Expanded = False FieldName = 'C�digo' Width = 100 Visible = True end item Expanded = False FieldName = 'Descritivo' Title.Caption = 'Nome' Width = 115 Visible = True end item Expanded = False FieldName = 'Telefone' Width = 120 Visible = True end item Expanded = False FieldName = 'Contribuinte' Width = 100 Visible = True end item Expanded = False FieldName = 'Empregado' Title.Caption = 'Funcion�rio' Visible = True end item Expanded = False FieldName = 'Fornecedor' Visible = True end item Expanded = False FieldName = 'Saldo' Title.Alignment = taCenter Width = 100 Visible = True end> end object BitBtn2: TBitBtn Left = 296 Top = 488 Width = 75 Height = 25 Hint = 'Listagem' Caption = 'Lista&gem' ParentShowHint = False ShowHint = True TabOrder = 11 OnClick = BitBtn2Click Glyph.Data = { 36030000424D3603000000000000360000002800000010000000100000000100 1800000000000003000000000000000000000000000000000000FFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00000060606060606060606060606060 6060606060606060606060606060606060303030000000FFFFFFFFFFFF000000 90909060808020BF9F409F5F409F5F409F5F409F5F409F5F00BFBF90B0B06060 60000000FFFFFFFFFFFF00000090909090909060BFBF60BFBF60BFBF60BFBF60 BFBF60BFBF60BFBF90B0B0606060000000FFFFFFFFFFFFFFFFFF0000007F7F7F 7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F3F3F3FFFFF FFFFFFFFFFFFFFFFFFFFFFFFFF3F3F3FBFBFBF3FFFFF30EFEF60DFDF60DFDF60 DFDF60DFDF60DFDF3FFFFFBFBFBF3F3F3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 3F3F3FBFBFBF7FFFFF7FFFFF7FFFFF7FFFFF7FFFFF7FFFFF7FFFFFBFFFFFBFBF BF3F3F3FFFFFFFFFFFFFFFFFFFFFFFFF00000060606060606060606060606060 6060606060606060606060606060606060303030FFFFFFFFFFFFFFFFFF000000 90909060808020BF9F409F5F409F5F409F5F409F5F409F5F00BFBF90B0B06060 60000000FFFFFFFFFFFF00000090909090909060BFBF60BFBF60BFBF60BFBF60 BFBF60BFBF60BFBF90B0B0606060000000FFFFFFFFFFFFFFFFFF0000007F7F7F 7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F3F3F3FFFFF FFFFFFFFFFFFFFFFFFFFFFFFFF3F3F3FBFBFBF3FFFFF30EFEF60DFDF60DFDF60 DFDF60DFDF60DFDF3FFFFFBFBFBF3F3F3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 3F3F3FBFBFBF7FFFFF7FFFFF7FFFFF7FFFFF7FFFFF7FFFFF7FFFFFBFFFFFBFBF BF3F3F3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00000000000000000000000000 0000000000000000000000000000000000000000000000FFFFFF} end object BitBtn7: TBitBtn Left = 608 Top = 14 Width = 75 Height = 25 Caption = '&Sair' Default = True ModalResult = 1 TabOrder = 12 OnClick = BitBtn7Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000 03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB 0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB 0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB 0333337F777FFFFF7F3333000000000003333377777777777333} NumGlyphs = 2 end object Edit1: TEdit Left = 104 Top = 44 Width = 100 Height = 21 Color = clBtnFace Ctl3D = True ParentCtl3D = False TabOrder = 0 end object Edit2: TEdit Left = 248 Top = 44 Width = 100 Height = 21 Color = clBtnFace Ctl3D = True ParentCtl3D = False TabOrder = 1 end object Edit5: TEdit Left = 104 Top = 65 Width = 220 Height = 21 Color = clBtnFace Ctl3D = True ParentCtl3D = False TabOrder = 2 end object Edit6: TEdit Left = 350 Top = 65 Width = 220 Height = 21 Color = clBtnFace Ctl3D = True ParentCtl3D = False TabOrder = 3 end object Edit7: TEdit Left = 104 Top = 85 Width = 100 Height = 21 Color = clBtnFace Ctl3D = True ParentCtl3D = False TabOrder = 4 end object BitBtn8: TBitBtn Left = 608 Top = 48 Width = 75 Height = 25 Caption = '&Filtrar' TabOrder = 13 OnClick = BitBtn8Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333333333FF33333333333330003FF3FFFFF3333888003000003333 300088F888883F333888E00BFBFB033333338883333F8F33333FE0BFBF000333 330088F3338883F33388E0FBFBFBF033330088F3333FF8FFF388E0BFBF000000 333388F3338888883F3FE0FBFBFBFBFB039988F33FFFFFFF8388E0BF00000000 339988FF888888883388000BFB03333333338883FF833333333F333000333333 3300333888333333338833333333333333003333333333333388333333333333 333333333333333333FF33333333333330003333333333333888333333333333 3000333333333333388833333333333333333333333333333333} NumGlyphs = 2 end object BitBtn9: TBitBtn Left = 608 Top = 72 Width = 75 Height = 25 Caption = '&Limpar' TabOrder = 14 OnClick = BitBtn9Click Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000120B0000120B00001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFF00000444 4444FFF0888884444444FF08888884444444F08888800B444444088880BB00BB B0FF00333B0BB0BBB0FFFF33BF00BB0BB0FFFFFF3BB0BB0B00FFFFFFF3BB0008 0FFFFFFFFF33B88300FFFFFFFFFF330030FFFFFFFFFF0030030FFFFFFFFFF003 0030FFFFFFFFFF003003FFFFFFFFFFFF0300FFFFFFFFFFFFF030} end object BitBtn3: TBitBtn Left = 386 Top = 488 Width = 75 Height = 25 Hint = 'Conta Corrente' Caption = '&Cont. Corr.' ParentShowHint = False ShowHint = True TabOrder = 15 OnClick = BitBtn3Click end object ComboBox4: TComboBox Left = 104 Top = 150 Width = 110 Height = 21 Hint = 'Muda a ordena��o da lista' Style = csDropDownList Color = clInfoBk ItemHeight = 13 ParentShowHint = False ShowHint = True TabOrder = 9 OnChange = ComboBox4Change Items.Strings = ( 'C�digo' 'Nome' 'Empregado' 'Fornecedor') end object CheckBox1: TCheckBox Left = 104 Top = 128 Width = 73 Height = 17 Caption = 'Empregado' Color = clWhite ParentColor = False TabOrder = 7 OnClick = CheckBox1Click end object CheckBox2: TCheckBox Left = 248 Top = 128 Width = 73 Height = 17 Caption = 'Fornecedor' Color = clWhite ParentColor = False TabOrder = 8 OnClick = CheckBox2Click end object BitBtn1: TBitBtn Left = 474 Top = 488 Width = 75 Height = 25 Hint = 'Ficha' Caption = 'Fi&cha' ParentShowHint = False ShowHint = True TabOrder = 16 OnClick = BitBtn1Click end object BitBtn4: TBitBtn Left = 608 Top = 96 Width = 75 Height = 25 Hint = 'Retira o item'#13#10'seleccionado '#13#10'da lista' Caption = '&Retirar' ParentShowHint = False ShowHint = True TabOrder = 17 OnClick = BitBtn4Click Glyph.Data = { 42040000424D4204000000000000420000002800000020000000100000000100 1000030000000004000000000000000000000000000000000000007C0000E003 00001F000000E03DE03DE03D000000000000000000000000000000000000E03D E03DE03DE03DE03DE03DE03DEF3DEF3DEF3DEF3DEF3DEF3DEF3DEF3DEF3DFF7F E03DE03DE03DE03DE03DE03D0000FF7FEF3DEF3DEF3DEF3DEF3DEF3D0000E03D E03DE03DE03DE03DE03DE03DEF3DFF7FE03DFF7FE03DFF7FE03DFF7FEF3DFF7F E03DE03DE03DE03DE03DE03D0000FF7F0000F75E0000F75E0000EF3D0000E03D E03DE03DE03DE03DE03DE03DEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7F E03DE03DE03DE03DE03DE03D0000FF7F0000F75E0000EF3D0000EF3D0000E03D E03DE03DE03DE03DE03DE03DEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7F E03DE03DE03DE03DE03DE03D0000FF7F0000F75E0000F75E0000EF3D0000E03D E03DE03DE03DE03DE03DE03DEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7F E03DE03DE03DE03DE03DE03D0000FF7F0000F75E0000EF3D0000EF3D0000E03D E03DE03DE03DE03DE03DE03DEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7F E03DE03DE03DE03DE03DE03D0000FF7F0000F75E0000F75E0000EF3D0000E03D E03DE03DE03DE03DE03DFF7FEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7F E03DFF7FE03DE03D0000E03D0000FF7F0000F75E0000EF3D0000EF3D0000E03D 0000E03DE03DE03DEF3DE03DEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7F EF3DE03DE03DE03DE03D00000000FF7F0000F75E0000F75E0000EF3D00000000 E03DE03DE03DE03DE03DEF3DEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7FEF3DEF3D E03DE03DE03DE03DE03DE03D0000FF7F0000F75E0000EF3D0000EF3D0000E03D E03DE03DE03DE03DE03DE03DEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7F E03DE03DE03DE03DE03DE03D0000EF3D0000EF3D0000EF3D0000EF3D0000E03D E03DE03DE03DE03DE03DE03DEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7FEF3DFF7F FF7FE03DE03DE03DE03D00000000000000000000000000000000000000000000 E03DE03DE03DE03DE03DEF3DEF3DEF3DEF3DEF3DEF3DEF3DEF3DEF3DEF3DEF3D FF7FE03DE03DE03DE03D0000FF7FF75EF75EF75EEF3DEF3DEF3DEF3DEF3D0000 E03DE03DE03DE03DE03DEF3DFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FEF3D FF7FE03DE03DE03DE03D00000000000000000000000000000000000000000000 E03DE03DE03DE03DE03DEF3DEF3DEF3DEF3DEF3DEF3DEF3DEF3DEF3DEF3DEF3D E03DE03DE03DE03DE03DE03DE03DE03D0000EF3DEF3DEF3D0000E03DE03DE03D E03DE03DE03DE03DE03DE03DE03DE03DEF3DFF7FFF7FFF7FEF3DFF7FE03DE03D E03DE03DE03DE03DE03DE03DE03DE03D00000000000000000000E03DE03DE03D E03DE03DE03DE03DE03DE03DE03DE03DEF3DEF3DEF3DEF3DEF3DE03DE03DE03D E03DE03DE03D} NumGlyphs = 2 end object CurrencyEdit1: TCurrencyEdit Left = 104 Top = 105 Width = 110 Height = 21 AutoSize = False Color = clBtnFace DisplayFormat = ',0.00;-,0.00' TabOrder = 5 end object CurrencyEdit2: TCurrencyEdit Left = 240 Top = 105 Width = 110 Height = 21 AutoSize = False Color = clBtnFace DisplayFormat = ',0.00;-,0.00' TabOrder = 6 end object OpenDialog1: TOpenDialog Filter = 'Ficheiros RTF|*.rtf' Left = 417 Top = 9 end object Table1: TTable DatabaseName = 'Database1' Filtered = True FilterOptions = [foCaseInsensitive] TableName = 'Contactos.DB' Left = 384 Top = 8 object Table1ID: TAutoIncField FieldName = 'ID' ReadOnly = True end object Table1Cdigo: TStringField FieldName = 'C�digo' Required = True end object Table1Descritivo: TStringField FieldName = 'Descritivo' Size = 50 end object Table1Endereo: TMemoField FieldName = 'Endere�o' BlobType = ftMemo Size = 240 end object Table1Cp: TStringField FieldName = 'Cp' Size = 10 end object Table1Cp1: TStringField FieldName = 'Cp1' Size = 25 end object Table1Telefone: TStringField FieldName = 'Telefone' Size = 25 end object Table1Fax: TStringField FieldName = 'Fax' Size = 25 end object Table1Email: TStringField FieldName = 'Email' Size = 30 end object Table1SeguranaSocial: TStringField FieldName = 'Seguran�a Social' Size = 15 end object Table1Contribuinte: TStringField FieldName = 'Contribuinte' Size = 10 end object Table1TipoRendimento: TStringField FieldName = 'Tipo Rendimento' Size = 3 end object Table1Empregado: TStringField FieldName = 'Empregado' Size = 3 end object Table1Obs: TMemoField FieldName = 'Obs.' BlobType = ftMemo Size = 240 end object Table1Tlm: TStringField FieldName = 'Tlm' Size = 25 end object Table1Seguradora: TStringField FieldName = 'Seguradora' Size = 30 end object Table1MoradaSeguradora: TMemoField FieldName = 'Morada Seguradora' BlobType = ftMemo Size = 240 end object Table1CpSeguradora: TStringField FieldName = 'Cp Seguradora' Size = 10 end object Table1Cp1Seguradora: TStringField FieldName = 'Cp1 Seguradora' Size = 25 end object Table1TelefoneSeguradora: TStringField FieldName = 'Telefone Seguradora' Size = 25 end object Table1FaxSeguradora: TStringField FieldName = 'Fax Seguradora' Size = 25 end object Table1EmailSeguradora: TStringField FieldName = 'Email Seguradora' Size = 30 end object Table1Aplice: TStringField FieldName = 'Ap�lice' end object Table1Incio: TDateField FieldName = 'In�cio' end object Table1Fim: TDateField FieldName = 'Fim' end object Table1Prmio1: TFloatField FieldName = 'Pr�mio1' end object Table1Prmio2: TFloatField FieldName = 'Pr�mio2' end object Table1ValorSeguro1: TFloatField FieldName = 'Valor Seguro1' end object Table1ValorSeguro2: TFloatField FieldName = 'Valor Seguro2' end object Table1Foto: TStringField FieldName = 'Foto' Size = 255 end object Table1Salrio: TFloatField FieldName = 'Sal�rio' end object Table1NIB: TStringField FieldName = 'NIB' Size = 23 end object Table1Ocorrncias: TMemoField FieldName = 'Ocorr�ncias' BlobType = ftMemo Size = 240 end object Table1PrevisoAumento: TFloatField FieldName = 'Previs�o Aumento' end object Table1TipoPagamento: TStringField FieldName = 'Tipo Pagamento' Size = 15 end object Table1ModoPagamento: TStringField FieldName = 'Modo Pagamento' Size = 15 end object Table1Fornecedor: TStringField FieldName = 'Fornecedor' Size = 3 end object Table1Stretch: TBooleanField FieldName = 'Stretch' end object Table1Salrio2: TFloatField FieldName = 'Sal�rio2' end object Table1Http: TStringField FieldName = 'Http' Size = 40 end object Table1Saldo: TFloatField FieldName = 'Saldo' end end object DataSource1: TDataSource DataSet = Table1 Left = 352 Top = 8 end object Table2: TTable DatabaseName = 'Database1' Filtered = True IndexName = 'iData' TableName = 'CCContactos.DB' Left = 448 Top = 8 end object RxPopupMenu2: TRxPopupMenu Left = 504 Top = 8 object Circulares1: TMenuItem Caption = 'Circulares' OnClick = Circulares1Click end object EmBranco1: TMenuItem Caption = 'Em Branco' OnClick = EmBranco1Click end object N2: TMenuItem Caption = '-' end object Etiquetas1: TMenuItem Caption = 'Etiquetas' OnClick = Etiquetas1Click end object EtiquetasCondomnio1: TMenuItem Caption = 'Etiquetas Condom�nio' OnClick = EtiquetasCondomnio1Click end object EtiquetasAdministrao1: TMenuItem Caption = 'Etiquetas Administra��o' OnClick = EtiquetasAdministrao1Click end object N1: TMenuItem Caption = '-' end object Registos1: TMenuItem Caption = 'Registo Colectivo' OnClick = Registos1Click end object RegistoIndividual1: TMenuItem Caption = 'Registo Individual' OnClick = RegistoIndividual1Click end end end